#pragma once

#include <iostream>
#include <string>
#include <cstring>
#include <algorithm>
#include <memory>
#include "Socket.hpp"
#include "Log.hpp"
#include <poll.h>

using namespace SocketModule;
using namespace LogModule;

const int gdefaultfd = -1;

#define MAX 4096

// 最开始的时候，tcpserver 只有一个socketfd
class PollServer
{
public:
    PollServer(int port)
        : _port(port), 
        _listen_socket(std::make_unique<TcpSocket>()),
        _isrunning(false)
    {
    }

    void Init()
    {
        _listen_socket->BuildTcpSocketMethod(_port);
        for(int i = 0; i < MAX; i++)
        {
            _fds[i].fd = gdefaultfd;
            _fds[i].events = 0;
            _fds[i].revents = 0;
        }
        // 先把唯一的 fd 添加到poll中
        _fds[0].fd = _listen_socket->Fd();
        _fds[0].events |= POLLIN;
    }

    void Loop()
    {
        int timeout = 1000;
        _isrunning = true;

        while (_isrunning)
        {
            // 我们不能让 accept 来阻塞检测新连接到来，而因该让 select 来负责进行 就绪事件的检测
            // 用户告诉内核，你要帮我关心 &rfds，该事件啊！！
            int n = poll(_fds, MAX, timeout);   // 通知上层的任务！
            switch (n)
            {
            case 0:
                std::cout << "time out..." << std::endl;
                break;
            case -1:
                perror("poll");
                break;
            default:
                // 有事件就绪了
                // rfds: 内核告诉用户，你关心的 rfds 中的 fd，有哪些已经就绪了!!!
                Dispatcher();    // 把已经就绪的 sockfd 派发给指定的模块
                TestFd();
                break;
            }
        }
        _isrunning = false;
    }

    void Accepter() // 回调函数
    {
        InetAddr client;
        // listensockfd 就绪了！ 获取新连接不就好了吗？
        int newfd = _listen_socket->Accepter(&client); //  此时一定不会被阻塞 select 告诉我 listensockfd 已经就绪了！ 只执行 “拷贝”
        if (newfd < 0)
            return;
        else
        {
            std::cout << "获得了一个新的连接： " << newfd << " client info " << client.Addr() << std::endl;
            // recv() ?? 读事件是否就绪，我们并不清楚！ newfd 也托管给select 让 select 帮我关心 sockfd 上面的读事件就绪
            // 怎么把新的 newfd 托管给 select 让select帮我去关心 newfd 上面的读事件 ?? 添加到辅助数组即可

            int pos = -1;
            for (int j = 0; j < MAX; j++)
            {
                if (_fds[j].fd == gdefaultfd)
                {
                    pos = j;
                    _fds[j].fd = newfd;
                    _fds[j].events = POLLIN;
                    break;
                }
            }

            if (pos == -1)
            {
                // fds进行扩容
                LOG(LogLevel::ERROR) << "服务器已经满了...";
                close(newfd);
            }
        }
    }

    void Recver(int who)    // 回调函数
    {
        // 合法的就绪的普通的 fd
        char buffer[1024];
        ssize_t n = recv(_fds[who].fd, buffer, sizeof(buffer) - 1, 0); // 此时也不会被阻塞 就绪
        if (n > 0)
        {
            buffer[n] = 0;
            std::cout << "client# " << buffer << std::endl;
            // 把读到的信息， 再回显回去
            std::string message = "echo# ";
            message += buffer;
            send(_fds[who].fd, message.c_str(), message.size(), 0);
        }
        else if (n == 0)
        {
            LOG(LogLevel::DEBUG) << "客户端退出， sockfd: " << _fds[who].fd;
            close(_fds[who].fd);
            _fds[who].fd = gdefaultfd;
        }
        else
        {
            LOG(LogLevel::DEBUG) << "客户端读取出错， sockfd: " << _fds[who].fd;
            close(_fds[who].fd);
            _fds[who].fd = gdefaultfd;
        }
    }

    void Dispatcher()
    {
        for (int i = 0; i < MAX; i++)
        {
            if (_fds[i].fd == gdefaultfd)
                continue;

            if (_fds[i].fd == _listen_socket->Fd())
            {
                if (_fds[i].revents & POLLIN)
                {
                    Accepter(); // 连接的获取
                }
            }
            else
            {
                if (_fds[i].revents & POLLIN)
                {
                    Recver(i);  // IO 的处理
                }
                // else if(_fds[i].revents & POLLOUT)
                // {

                // }
            }
        }
    }

    void TestFd()
    {
        std::cout << "pollfd: ";
        for(int i = 0; i < MAX; i++)
        {
            if(_fds[i].fd == gdefaultfd) continue;
            std::cout << _fds[i].fd << "[" << Evects2Str(_fds[i].events) <<  "] " << std::endl;
        }
        std::cout << '\n';
    }

    std::string Evects2Str(short events)
    {
        std::string s = (events & POLLIN) ? "POLLIN" : "";
        s +=  (events & POLLOUT) ? "POLLOUT" : "";
        return s;
    }

    ~PollServer()
    {
    }

private:
    uint16_t _port;
    std::unique_ptr<Socket> _listen_socket;
    bool _isrunning;
    struct pollfd _fds[MAX];
};